home *** CD-ROM | disk | FTP | other *** search
/ Chip 2007 January, February, March & April / Chip-Cover-CD-2007-02.iso / Pakiet bezpieczenstwa / mini Pentoo LiveCD 2006.1 / mpentoo-2006.1.iso / modules / nessus-2.2.8.mo / usr / lib / nessus / plugins / c32.nasl < prev    next >
Encoding:
Text File  |  2005-01-14  |  1.8 KB  |  73 lines
  1. #
  2. # This script was written by Renaud Deraison <deraison@cvs.nessus.org>
  3. #
  4. # See the Nessus Scripts License for details
  5. #
  6.  
  7. if(description)
  8. {
  9.  script_id(10389);
  10.  script_bugtraq_id(1153);
  11.  script_version ("$Revision: 1.15 $");
  12.  script_cve_id("CAN-2000-0429");
  13.  
  14.  name["english"] = "Cart32 ChangeAdminPassword";
  15.  name["francais"] = "Cart32 ChangeAdminPassword";
  16.  script_name(english:name["english"], francais:name["francais"]);
  17.  
  18.  desc["english"] = "
  19. The Cart32 e-commerce shopping cart is installed.
  20.  
  21. This software contains several security flaws :
  22.  
  23.     - it may contain a backdoor
  24.     - users may be able to change the admin password remotely
  25.  
  26.  
  27. See also : http://www.cerberus-infosec.co.uk/advcart32.html
  28. Solution : Use Cart32 version 5.0 or newer
  29. Risk factor : High";
  30.  
  31.  
  32.  
  33.  script_description(english:desc["english"]);
  34.  
  35.  summary["english"] = "Determines the presence of Cart32";
  36.  summary["francais"] = "DΘtermine la prΘsence de Cart32";
  37.  script_summary(english:summary["english"], francais:summary["francais"]);
  38.  
  39.  script_category(ACT_GATHER_INFO);
  40.  
  41.  
  42.  script_copyright(english:"This script is Copyright (C) 2000 Renaud Deraison",
  43.         francais:"Ce script est Copyright (C) 2000 Renaud Deraison");
  44.  family["english"] = "Backdoors";
  45.  family["francais"] = "Backdoors";
  46.  script_family(english:family["english"], francais:family["francais"]);
  47.  script_dependencie("find_service.nes", "no404.nasl");
  48.  script_require_ports("Services/www", 80);
  49.  exit(0);
  50. }
  51.  
  52. #
  53. # The script code starts here
  54. #
  55.  
  56. include("http_func.inc");
  57. include("http_keepalive.inc");
  58. port = get_http_port(default:80);
  59. if ( !port || ! get_port_state(port) ) exit(0);
  60.  
  61. foreach dir (cgi_dirs())
  62. {
  63.  req = http_get(item:dir + "/cart32.exe", port:port);
  64.  res = http_keepalive_send_recv(port:port, data:req);
  65.  if ( res == NULL ) exit(0);
  66.  if ( egrep(pattern:"<title>Cart32 [0-2]\.", string:res) )
  67.     {
  68.     security_hole(port);
  69.     exit(0);
  70.     }
  71. }
  72.     
  73.